home *** CD-ROM | disk | FTP | other *** search
/ Resource Library: Multimedia / Resource Library: Multimedia.iso / space / educatio / mac / mssnhmcr.hqx / MISSION HOME CARD / card_3890.txt < prev    next >
Text File  |  1993-02-04  |  6KB  |  294 lines
  1. -- card: 3890 from stack: in
  2. -- bmap block id: 4313
  3. -- flags: 0000
  4. -- background id: 2683
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=228 top=282 right=305 bottom=254
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 1014 / 1014
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Prev
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   go to prev card
  23. end mouseUp
  24.  
  25.  
  26.  
  27. -- part 2 (button)
  28. -- low flags: 00
  29. -- high flags: 0000
  30. -- rect: left=258 top=282 right=305 bottom=283
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 1013 / 1013
  33. -- text alignment: 1
  34. -- font id: 0
  35. -- text size: 12
  36. -- style flags: 0
  37. -- line height: 16
  38. -- part name: Next
  39. ----- HyperTalk script -----
  40. on mouseUp
  41.   go to next card
  42. end mouseUp
  43.  
  44.  
  45.  
  46. -- part 4 (button)
  47. -- low flags: 00
  48. -- high flags: 8000
  49. -- rect: left=19 top=154 right=253 bottom=76
  50. -- title width / last selected line: 0
  51. -- icon id / first selected line: 0 / 0
  52. -- text alignment: 1
  53. -- font id: 0
  54. -- text size: 12
  55. -- style flags: 0
  56. -- line height: 16
  57. -- part name: 
  58. ----- HyperTalk script -----
  59. on mouseUp
  60.   go to card id 2816 of stack "Mercury Mission Stack"
  61. end mouseUp
  62.  
  63.  
  64.  
  65.  
  66. -- part 5 (button)
  67. -- low flags: 00
  68. -- high flags: 8000
  69. -- rect: left=76 top=156 right=253 bottom=132
  70. -- title width / last selected line: 0
  71. -- icon id / first selected line: 0 / 0
  72. -- text alignment: 1
  73. -- font id: 0
  74. -- text size: 12
  75. -- style flags: 0
  76. -- line height: 16
  77. -- part name: 
  78. ----- HyperTalk script -----
  79. on mouseUp
  80.   go to card id 2833 of stack "Gemini Mission Stack"
  81. end mouseUp
  82.  
  83.  
  84.  
  85.  
  86. -- part 6 (button)
  87. -- low flags: 00
  88. -- high flags: 8000
  89. -- rect: left=190 top=143 right=253 bottom=292
  90. -- title width / last selected line: 0
  91. -- icon id / first selected line: 0 / 0
  92. -- text alignment: 1
  93. -- font id: 0
  94. -- text size: 12
  95. -- style flags: 0
  96. -- line height: 16
  97. -- part name: 
  98. ----- HyperTalk script -----
  99. on mouseUp
  100.   go to card id 2967 of stack "Skylab Mission Stack"
  101. end mouseUp
  102.  
  103.  
  104.  
  105.  
  106. -- part 7 (button)
  107. -- low flags: 00
  108. -- high flags: 8000
  109. -- rect: left=132 top=151 right=253 bottom=191
  110. -- title width / last selected line: 0
  111. -- icon id / first selected line: 0 / 0
  112. -- text alignment: 1
  113. -- font id: 0
  114. -- text size: 12
  115. -- style flags: 0
  116. -- line height: 16
  117. -- part name: 
  118. ----- HyperTalk script -----
  119. on mouseUp
  120.   go to card id 3610 of stack "Apollo Missions Stack"
  121. end mouseUp
  122.  
  123.  
  124.  
  125.  
  126. -- part 8 (button)
  127. -- low flags: 00
  128. -- high flags: 8000
  129. -- rect: left=291 top=150 right=251 bottom=431
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 0 / 0
  132. -- text alignment: 1
  133. -- font id: 0
  134. -- text size: 12
  135. -- style flags: 0
  136. -- line height: 16
  137. -- part name: 
  138. ----- HyperTalk script -----
  139. on mouseUp
  140.   go to card id 9521 of stack "Apollo Missions Stack"
  141. end mouseUp
  142.  
  143.  
  144.  
  145.  
  146. -- part 9 (button)
  147. -- low flags: 00
  148. -- high flags: 8000
  149. -- rect: left=434 top=152 right=251 bottom=487
  150. -- title width / last selected line: 0
  151. -- icon id / first selected line: 0 / 0
  152. -- text alignment: 1
  153. -- font id: 0
  154. -- text size: 12
  155. -- style flags: 0
  156. -- line height: 16
  157. -- part name: 
  158. ----- HyperTalk script -----
  159. on mouseUp
  160.   go to card id 3998 of stack "STS Mission Stack"
  161. end mouseUp
  162.  
  163.  
  164.  
  165.  
  166. -- part 10 (button)
  167. -- low flags: 00
  168. -- high flags: 8000
  169. -- rect: left=16 top=35 right=120 bottom=84
  170. -- title width / last selected line: 0
  171. -- icon id / first selected line: 0 / 0
  172. -- text alignment: 1
  173. -- font id: 0
  174. -- text size: 12
  175. -- style flags: 0
  176. -- line height: 16
  177. -- part name: 
  178. ----- HyperTalk script -----
  179. on mouseUp
  180.   go to stack "ASTRONAUTS/STACK"
  181. end mouseUp
  182.  
  183.  
  184.  
  185.  
  186. -- part 14 (button)
  187. -- low flags: 00
  188. -- high flags: 0000
  189. -- rect: left=264 top=6 right=18 bottom=286
  190. -- title width / last selected line: 0
  191. -- icon id / first selected line: 0 / 0
  192. -- text alignment: 1
  193. -- font id: 0
  194. -- text size: 12
  195. -- style flags: 0
  196. -- line height: 16
  197. -- part name: globalfind
  198. ----- HyperTalk script -----
  199. on mouseup
  200.   repeat with y = 1 to 100
  201.     set cursor to busy
  202.     global t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15, t16,t17,t18,t19,t20,t21,t22,t23,t24,t25,t26,t27,t28,t29,t30, t31,t32,t33,t34,t35,t36,t37,t38,t39,t40,t41,t42,t43,t44
  203.     global t0, x, r,hat,straw,buff1,buff2,count1,count2, t45,t46,t47,t48,t49,t50,t51,t52,t53,t54,t55,t56,t57,t58,t59,t60
  204.     find whole t0
  205.     get the result
  206.     if count1>=3 and it is not empty then
  207.       put the number of this card into hat
  208.       put the foundchunk into buff1
  209.       show message box
  210.       flash 2
  211.       exit mouseup
  212.     else
  213.       if it is not empty then
  214.         add 1 to count1
  215.         set lockscreen to true
  216.         go to "NASA Pocket Statistic 1991 (1)"
  217.         send "mouseup" to button "GlobalFind"
  218.       else
  219.         put the number of this card into hat
  220.         put the foundchunk into buff1
  221.         exit mouseup
  222.       end if
  223.     end if
  224.   end repeat
  225. end mouseup
  226. on enterkey
  227.   global t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15, t16,t17,t18,t19,t20,t21,t22,t23,t24,t25,t26,t27,t28,t29,t30, t31,t32,t33,t34,t35,t36,t37,t38,t39,t40,t41,t42,t43,t44
  228.   global t0,x,r,hat,straw,buff1,buff2,count1,count2,t45,t46,t47, t48,t49,t50,t51,t52,t53,t54,t55,t56,t57,t58,t59,t60
  229.   hide message box
  230.   find whole t0
  231.   put 0 into count1
  232.   put the number of this card into straw
  233.   put the foundchunk into buff2
  234.   if straw = hat and buff1 = buff2 then
  235.     add 1 to x
  236.     put "t"&x into r
  237.     set lockscreen to true
  238.     go to "NASA Pocket Statistic 1991 (1)"
  239.     send "mouseup" to button "GlobalFind"
  240.   end if
  241. end enterkey
  242.  
  243.  
  244.  
  245.  
  246.  
  247.  
  248.  
  249.  
  250.  
  251.  
  252.  
  253.  
  254.  
  255.  
  256.  
  257.  
  258.  
  259.  
  260.  
  261.  
  262.  
  263.  
  264.  
  265.  
  266.  
  267.  
  268.  
  269.  
  270.  
  271.  
  272.  
  273.  
  274.  
  275.  
  276.  
  277. -- part contents for background part 19
  278. ----- text -----
  279.  
  280.  
  281.  
  282.  
  283.  
  284.  
  285.  
  286.  
  287.  
  288.  
  289.  
  290.  
  291. -- part contents for background part 18
  292. ----- text -----
  293.  
  294.